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CHANGES AT AARDVARK 


AARDVARK has now grown bigger. We have 
more staff working, more programs to offer, 
and now we have more space. An idyllic era 
has come to an end with the moving AARDVARK 
out of its quarters attached to our home to a 
much more spacious office a short distance 
away. AARDVARK now has its own building - 
small though it may be. We didn’t have toa 
much choice about the change. whe had gotten 
so crowded that we were beginning to make 
mistakes just from being pushed too often to 
find a place to put something. We’d gotten to 
the point whre you had to pick up tuo things 
to find room to put down one, and then you 
had your hands full of whatever you’d picked 
up. We started to get errors in 
documentation and errors’ in programs simply 
due to the fact that it was hard to keep 
things straight in too smal! an area. There 
will, unfortunately, be some changes in the 
kind of services we can offer now that the 
business has grown larger. We are going to 
try to keep the same kind of close contact 
that we have had with our customers = and 
readers in the past and therefore the phones 
will ring both at the old quarters and at the 
new office as well. You’1l! still be able to 


chat with me or get answers to questions. 


‘after regular business hours. However, all 


the files are at the new office and if you. 


have specific questions about your order or 
your subscription where we have to refer to 
the files to get you an answer, you’!! have 
to call between 93 am and 4 pm (EST), or call 
one day and wait until! the next day for an 
answer. Also, we are going to stop answering 
the phone on Sunday and after about 3S at 
night. We like keeping the phones open late 
as it saves our customers money if they cal! 
on evening rates, but it has been getting a 
little silly recently, and we are going to 
cut the phones at a reasonable hour. 

We think you can summarize it all by 
saying that despite the fact that this is a 
growing enterprise, we plan to keep it as 
informal and friendly as we can. 


BEGINNER’ S CORNER 
TYPING IN MACHINE CODE PROGRAMS 


You don’t really have to know how to 
program in machine code in order to make use 
of a number of the routines that have been 
published in places !|ike MICRO, COMPUTE, and 
(best of all} the AARDVARK JOURNAL. However, 
they do not normally bother to explain just 
how you are suppose to get that long list of 
stuff into your computer. It can be somewhat 
confusing the first time you try it. 

There is a fairly standard form for 
printing these programs, which, once yau 
understand what they are doing, makes it easy 
to get into your computer one way or the 
other. 


Rather than give examples here, I’ 11 refer 
you to the eritcles in this months’ journal. 
They all follow the format that we are going 


to describe. 
The first thing we have to define is the. 


funny word ’ field’. A field is all the 
letters ina row up until you hit a space. 
You’ tl! notice if you look at a program from,. 


say, MICRO, that if you stand back and look 
at it there are actuaily columns down the 
page with bits missing out of each column 


here and there. These are actually seven 
fields of varying length. On a well filled 
line where all seven fields are used, the 


first thing you see is a number which jis 
normally four digits long and which may be 
from 1@ to 69888. That is the line number if. 
you are.. going to use an assembler. The next» 
field is a four digit hex number from $8009 
to GSFFFF. That is the actual memory location 
this line would be stored at if it were 
assembled in memory as shown here. - The next 
field over is normally from one to three 
pairs of hex digits. It can be either a 
single pair, two pair, or three pair of 
digits. That is the actual data that would 
be entered at that address if the program 
were to be put in memory as printed. If 
there is only a single bytes, that is, a 
single pair of digits, then they are placed 
in memory at the address which is shown in 


field #2. if there are two bytes of 
information, then they are placed into memory 
at that address and the next address. Tt 
there are three bytes, they are antered at 
the given address and the succeeding two. 
That s also why the numbers in the secend 
Field are not continuous. Pear inetognes, .2F 
uGuU put im a two byte peice af informetion at 


luotatian G23, the Next place wou can put 
something i O265 as that pair went actually 
inta BSUS ana B24. Tre fourth field aver is 
tne first tning you need if you are actually 
qoing to put this in with an assembler rather 
than hand anter it. threat column, 1af Ft 2s 
fitied Cand it is net atways 3 is the label 
column. We’ || get beck @ littie beter to 
explaining hsw to enter that label. Tre meae<t 
field over, which by the way is always 
filled, is catled the op code. it is ithe 
neumanie representaion of hye nuomber cade 
that appears as the first pair of hex digits 
ify Fe a #3. For ine tonce. ie At Feta Wa 
the first thirgq you see is AD, you will see 
LDA Claad accumulator) as the op code im 
field #5. The sixth field is called the 
operand field. it may or may not be filled. 


jt the field is Filled, it can Ge Ffillad with 
a number af different things. the label for 
another gqddress ar wariatble., nex number 
Cthey always begin with a $ sign), ar 
decimal number. 

The last field is a very important one, 
but thank goodness we don’t have to type it 
in because there’s an awfuyui lot of it. In 2 
well written machine code program there are a 
fot of remarks for a couple of reasons: (C1) 
It’s easy to forget why you did something in 
a machine code program. It’s even harder to 
read native code here than it is in BASIC and 
C2) since the remarks are not compiled into 
the machine, they don’t take up space in run 
time the way they do in BASIC. However, 
Since we only want to type the program in ana 
get it working and do not 

care about the remarks since we have them on 
paper, you can ignore the last field when you 
are typing the program in. 


TYPING IT ALL IN 

First, the simple method Cassuming that 
you do not have an assembler of any sort). 
If you don’t have an assembler and you have 
to use the OSI monitor, all you’re going ta 
need is the second field and the third field 
on these listings. Start by hitting (BREAK) 
and (M) and you” should see four zeros anda 
4C appearing in the upper left hand corner of 
the screen. The first thing you have to do is 
to go to the starting address of the program. 
To do that you presse €.3 - period - type in 
the four digits of the begimning address and 
they should appear on the screen as you type 
them. If you make a mistyupe, just continue 
tuping and the characters wil! rotate 
through. kKhen you are at the first 
sequential address of the program, you hit 
the (7) which puts you in data entry mode. . 
You then enter the first two digits in field 
#3, you should see them appear next to the 
address you just entered. When they are 
right, hit CRETURN) and the next address wil! 
be displayed. Put the next two digits from 
the data field at this address. You’ simply 
keep hitting return and entering the data as 
you go down the list as they are normally 
given sequentially. At any one time you 
should be able to check by tooking at the 
listing to see what you should have at that 
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address to see if you are right. If uou get 
out af sequence, hit the €.3, go back to the 
gacaress before the error, trit (RETURN) and 
read the addresses and data aytex until you 
find where you got out cf stap. When you 


have the entire program entered into memory, 
you* should store it before you attempt te do 
any manuplilatiorn with ‘a Mow, with @ GHIO 
SOLENT EF IC machine. there area number of 

aifferent ways of storing the sustem and they 


ali! need outside help of some sart, that is, 
they all require a program that is not in the 
monitor. Unfaortungtealy, that iG the scope of 


another article which we will try to squeeze 
in elsewhere in this journal but which we can 
not Get in et this point. SuTrfice it to say, 
that if you have the means to store the 
program, you shauld store it et this saint 
before you run it. In any case, you have 
either stored the program or decided you're 
not going te store it, you heve tea identify 
the start address which is normally given in 
the text accompanying the program. You hit 
the €.), type in the address you want to 
Stort ot end nit (6) for GO. 

Now you can’t da much with the program 
in terms of putting it anywhere else in 
memory or modifying the code. It has to be 
puUt in pretty much as the original author 
planned it and the whole process is rather 
error prone ave ta the fact that you are 
reading nothing but hex digits and its easy 
to mistupe one. It is, however, a simple 
procedure made simplier by the fact that 


OHLO SCIENTIFIC hes included the. basic 
routines we need in their monitor ROM. Most 
systems do not have similar facilities. 

THE EASY WAY - USING AN ASSEMBLER 
There are a number of assemblers around 

and we’re qoing to include an article 
elsewhere in this journal on the ones that 
are available, but they al! work just about 
the same as there is a standard pattern for 
the syntax in an assembler the same way there 
is a standard pattern to BASIC syntax. 
Warning - the keyword is “about"*. Variations 
in assemblers do exist and cheaper assemblers 
may tack some of the capabilities such as 
labeling that the more expensive ones have. 

To enter the program in assembler, you 
are going to need to read the first column 
Cor fieidd which is the line numbers, the 
fourth column which is the label column, the 
fifth column which is the op codes, and the 
sixth column which is the operands. The onty 
thing that is particularly confusing about 
this is that the stuff for the people without 
assemblers is in the middle between the first 
and the fourth columns, and while you’ don’t 
neeq any of that its still in your wag. Te 
type in a program in assembler, you begin by 
loading the assembler. You then type in the 
line number which appears in the first column 
on the left. Second, look at’ the ltabel 
column which is the fourth column over. L& 
there is a label there it is to be typed in 
immediately following the !ine number. There 
is to be nc space between them. Pyt in @t 
least one space after the !ine number or the 


line number-label combination. Third, type 
in the neumonic in the op code column such as 
Lr. You then have to leave at least one 


Space between the op code and the operand if 
there 1s one such as $88, om LOOP di, or 
whatever is in the operand column. You can 
then go on to the next line number as you 
don’ t really need to add the remarks. Remarks 
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are very important in assembler programming 
as it is easy to forget what you did. But you 
already have a copy Of the remarks on paper 
so you don’t have to type them in again. The 
process may actually take a little longer 
than direct hand cading, but it gives you a 
couple other advantages. The process is more 
error free, even though there is more 
tuping, since the typing vaguely tosoks 
similar to English, it can be read more 
easily and errors can be detected more 
rapidly. You also have a tittle more 
Flexibility in things {ike where to put the 
program. Most assemblers, although not ail, 
will aliow you to place the program virtually 
anywhere in free memory, normally the 
starting address specified in the first line 
or two with a star (€*) or the term ’ ORG=’ and 
by simply changing that address the assembler 
will be instructed to adjust all of the other 
addresses to fit. You, therefore, have some 
advantage in using the assembler. 

When you have it typed in, the same 
cautions apply. You should definitly store 
the source code (That’s what you have ben 
tupin mpile it and you should definitly store 
the ob ject code Cwhat you get when the sour 
the assembler) before you attempt to run it. 
In the absence of that, be brave (Cor 
foolhardy) by exiting the assembler, typing 
in the address of the program and hitting 
(GJ. That should get you up and running - if 
you typed it all in right. 


MACHINE CODE UTILITIES 


The almighty assembler. Now even you 
neophytes should know what an assembler is. 
That’s aoeprogram that allows you to type in 
an English like mneumonic and which then 
translates that into a machine code number. 
Beyond that there are a lot of features that 
assemblers may or may not have. You may be 
able to assemble anywhere in memory or only 
in limited areas. You may or may not have 
relative branching and labeling capacities, 
that is, what the branch from one section to 
another should be and it may or may not 
remember the names of places where you” want 
to store things or jump to. Once the 
assembler assembles a program in memory, you 
then break out of the assembler and run the 
machine code program. There are a number of 
assemblers available for OHIO SCIENTIFIC 
equipment. 

The old standby is the MOSTEK assembler 
which is sold by OSI. It runs $35 at your 
local dealers. It has most the features you 
would want in a medium size assembler. It 
will accept numbers in hex, binary or 
decimal, supports relative branching and 
labels, will store the program in memory or 
on tape, and has a targe number of error 
codes which it reports back in case you made 
a mistake. If you are a serious machine code 
programmer, it’s a good deal. It does take 
seven to eight minutes to load unless) you 
re-record it at higher baud rates. It also 
burns up a lot of memory, takes 8K to run and 
doesn’t leave ai lot of space left over toa 
assemble programs into. Remember, you have 
to assemble the programs into areas that are 


not currentiy being used by the assembler 
itself. However, at 35 and being full 
featured, it is a good deal for the serious 
or soon to be serious programmer. Il might 
note at this point that OSI alsa sells a disk 
based assembler which is virtually 
identical, but has a few more features. 
Unfortunately, OSI is having a hard time 
selling it as it was inadvertantiy inciuded 
on almost every systems cisk, including games 
disks, sold by OSI cover the past year or so. 
Sales of the seperate assembler are somewhat 
slow. 

Moving on for people with smal! 
machines, there is an assembler put out by 
Bill’s Micro Services (216 S. Kenilworth, Gak 


Park, a < 643827). Bill hasn’t been 
advertising recently and his company seems to 
be somewhat comatose, however, he did sell a 


3K assembler editor for the CIP, and also 
said it was going to be available for the 
C2/4 machines. I have not used the program, 
but I have had reports from several readers 
that it is a usable and workable assembler 
although it is somewhat limited in features, 
that is to say it does not support relative 
branching and labels. However, I have also 
heard that while Bill seems to be lying 
somewhat low, if you send him $12.95 he wil! 
still send you his assembler editor for the 
C1iP. That might be a good choice for the 
beginning computerist. On the underside, 
there is also a mini-assembler available from 
AARDVARK. We sell one in BASIC for $9.95. I 
have to admit that it is more of a training 
tool than it is a serious assembler, and it 
does not come close to matching all the 
features of a big, ful sized MOSTEK 
assembler. It is a two pass assembler that 
supports indirect addressing and labels and 
it uses all the standard MOSTEK neumonics. 
It is however limited to programs of 2565 
bytes long Cactually fairly tong in machine 
code} and longer programs have to be 
assembled in two or more passes. It is an 
easy to use and inexpensive assembler for the 
new computerist. It also outputs the program 
either as a self loading 65V machine code 
format tape or as DATA statements and as it 
is not assembled directly to memory it allows 
you to assemble programs in the same area 
that is being used by the assembler itself. 
The process is toa output a4 tape that when 
reentered in the machine will overload the 
area that the assembler occupies. Its a 
fairly handy beginner’s tool. 

On the other end of the scale, if you 
have a CS complete with 8" disks, Pegasus 
Software (P.O. Box 14684, Dept AA, Honolulu, 
HI, 98616) offers a disk based assembler that 
has a few more features that the OSI 
assembler and which sells for $75. There 
have also been a number of mini-assemblers 
for PETs and APPLES published in such places 
as KILOBAUD and MICRO. Those done in 
MICROSOFT BASIC will often transfer easily to 
an OSI machine if you have patience, 
masochism, and a buck anda half for the 
magazine. 

The next thing you need is an editor. 
Now, editor is avery loose term in 
microcomputing circles. You’ ve got to watch 
out what you’re buying because you could be 
buying almost anything. Technically, all an 
editor consists of iS a program that will 
modify another program. In that sense, you 
already have an editor already built into 


every OSI machine. That Jittle thing you 
come up with when you hit the M known aos the 
monitor is actually a little machine code 
editor. It allows you to change memory 
locations, and to execute programs and to 
load programs. A good editor has both editing 
and troubleshooting features. At a minimum it 
allows you to change data in memory 
locations enter programs and save them on 
tape or disk, and provides some sort of 
troubleshooting facilities such as a break 
point feature. OSI, again, sells one of the 
best an the market. Their $15 editor allows 
you to examine the memory tocations, change 
them, search through memory for strings or 


data bytes, does block moves of memory and 
relocates programs. You gat ail that for 
$15, not a bad deal. i’ve seen a few others 


on the market, but haven’t seen anything that 
I would recommend as being worthwhile. I'm 
sure there are a number of them, but I’m just 
not aware of them. 

If you have a taped based machine, you 
also need someway to save programs. This is 
extremely important as OSI did not provide a 
method of saving programs from the system 
itself. You must have some kind of external 
editor that saves them. There are several 
ways to do it and there are several programs 
out on the market. Here at ARRDVARK, we sell 
an AUTOLOADER tape for $5.95 that saves 
programs ina self starting 65V format. We 
also sel! what we cal! a POKER MAKER routine 
for 45.95 that takes programs that are 
already placed in memory by the assembler or 
by hand assembly and puts them out to the 
cassette as BATA statements sa they can be 
read from BASIC. We also sell the CiE and 
C2E monitor ROMs which are system ROMS with 
extended monitors in them and which are 
capable of scutputting a machine code tape. 

There are a iot of other ways to handle 
it. If you have been programming iin BASIC 
for awhite, it is fairly easy to write your 
own routine which will PEEK memory locations 
and print the data bytes out to the cassette. 
There have been a lot of very simple routines 
written for the KIM and the APPLE which can 
be adapted fairly easily ta the OSI if you 
happen to have copies of the JOURNAL around. 
OSI has also published an AUTOLOADER program, 
which unfortunately didn’t work too well, 
but once it’s debugged it’s fairly handy. 

Also aonumber of the assemblers we’ ve 
talked about here are capable of osutputting 
machine code tapes. In any case, you should 
plan, before you begin to program, how you 
are going to save the program when you are 
done. By the way, disk people don’t have to 
worry about it as their disk systems have the 
SAVE and CALL commands which atlow them to 
write memory directly up to the disk. 


DEBUGGING TOOLS 

One of the hardest things about writing 
machine code programs is debugging the 
blasted things. You don’t have the 
interactive features that you have with 
BASIC, the programs are not so easily 
modified for checking, and in general they 
are a pain to debug. Therefore, you should 
plan, if you are going to get into machine 
code properly, to have some means of 
debugging programs. There area number of 


them available that make the job fairly 
easy. The first tool you can have is the 
extended monitor. Most extended monitors, 
inmciuding OSI’*’s and the one in the C1IE and 
C2E chips support what is called break 
moints. They allow you to put a break in the 
program where the machine will stop, read out 
the contents of the registers ang then 
continue. We are also publishing a 
breakpoint program for tape based machines in 
this copy of the JOURNAL. 

While for the machine code diea-hards and 
other masochists, the break points ctone are 
sufficient for any real man to debug his 
program with, I personally prefer a trace 
program. Trace programs in machine code are 
the Cadillacs of the machine code utilities. 
Most trace programs are actually 6582 
emulators, that is they actually pretend to 
run the program and then report back to you 
what happens during running. It is difficult 
from the user point cf view to see the 
difference between a pretend run with phony 
registers and a real one with real registers. 

What happens is that while you execute the 
program, the trace program will} show the 
content of the registers and the program 
counter Cthe memory location the computer is 
running), and other interesting data as the 
program executes. Most of them will either 
single step through it or will step through a 
given number of bytes before stopping and 
displaying the contents of the registers. 


That makes machine code much, much easier to 
debug, you can actually watch the program 
execute. There are at least three or four of 
them available for the OSI. On the top end 
of the scale, Pegasus of Hawaii offers a 
trace program for floppy disk, $95.40. 

Moving a little further down the scale, 
RARDVARK now sells a trace utility with some 
other editor features such as direct string 
manipulation and memory manipulation for the 


5 174° or 8" disks for $24.95. That program 


takes about 844 bytes and should be available 
for tape machines aground March list for 

$19.95. For those of you with little tighter 
budgets and less expensive tastes we also 

offer ae trace and single step program in 
BASIC for the grand sum tota! of 12.95. Now 
this is a BASIC program that will single step 
through a machine code program and therefore 


is somewhat limited as the machine code 
program must be in space not used by the 
BASIC program. It therefore will trace 


programs between $1C84@ jand SG1iF84@ or any 
program located above the first Sk. This is 
another handy training tool as it allows you 
to watch machine code already in your system 
being executed. 
BOOKS 

The next thing you are going to need is 
a book of 6562 machine code. There are Iots 


of them on the market - most of them are 
junk. Particularly stay away from the Zaks 
books. The early issues seemed to have bugs 


in darn near every program and I haven’ t seen 
any evidence that they have been fixed. Out 
of the mess, I have found three books that 
have been particularly useful to me. One of 
my favorites is PROGRAMMING AND INTERFACING 
THE 6562 by Marvin D. Long. Its a Howard 
Sams book and therefore is overpriced at 
$13.95, but it seems to be more error free 
and clear than most of the books in the 
field. MOSTEK alsa puts out a book called 


PROGRAMMING AND INTERFACING T 6582 which is 


very dry reading and darn near boring, but 
which contains largely error free information 


and which has all the information you really 
need if you want to bore thorough it long 
enough. I also found SCLIBI’s 6502 GOURMET 


COOKBOOK to be of a help after I had read the 
other two. 

Starting in the next issue, the AARDVARK 
JOURNAL is going to carry tutorials son 
machine code programming but we’re going to 
concentrate on techniques and we will not 
attempt to teach the basic stuff you should 
be getting out of the other books on the 
market. Wie will, for instance, not discuss 
what the term LDA means, but will hopefully 
discuss some nice ways to use it. 

LOADING AND SAVING WITH CASSETTE 
by Chris Loelke 


I’m sure that we have all had our 
problems on occasion loading and saving 
programs on cassette. Usually, the error 
rate is even greater with ’ foreign’ cassettes 
(ones that we paid good money ford}. The 
following procedures should help you toa 
eliminate a lot of errors. 

Errors are caused by sone or more of the 
following items. 

13) computer problems 
a. BAUD rate not adjusted 
correctly | 
b. multivibrator adjusted 
incorrectly 
c. defective component or PC 
track. 
2) cassette problems 
a. head alignment 
b. cassette player speed 
c. wow and flutter Cwobbley sound) 
d. frequency response 
e. dirty machine 
f. poor quality drive mechanism 

To determine whether the cassette or the 
computer is at fault is relatively easy. 
Beg, borrow or steal a different cassette. 
machine. Make sure that is is known to be in 
good shape. Just because it is new is not an 
indication of its condition. Qver half of 
all new machines suffer from head-al ignment 
or speed errors. Generally, though, a player 
that costs in excess of $300 can be trusted. 

If you ere still having problems, it is 
time to tear into the computer and make a 
couple of simple checks. To check the baud 
rate a freguency counter. is required. The 
counter is connected to pin 4 of the UART 
(6856). This is one of the larger chips and 
it resides near the 6562 CPU. The frequency 
should read 488@ HERTZ plus or minus 5 HERTZ. 

If yours is not within that range, try 
adjusting R17? (the blue trimpot near U13 
(555)). A word of caution, if the frequency 
was out by more than 16%, you may find that 
you can no longer toad some of your own 
software after performing the test. Such are 
the breaks. 

The next adjustment to be checked is the 
pass-band of the multivibrator (U22 (74123)). 
It is adjusted with trimpot R26 near U2Z2. 
To adjust it, an oscilloscope would be handy, 


but we will adjust it here without one. The 
setting of the pot appears not to be very 
critical. Turning it ail the way to one end 
will cause the computer to stop loading 
completely; while turning it towards’ the 
other side will give about a 54% error rate. 
The ideal setting seems to be near the end 
~~ where the computer stops loading. To get the 


closest setting, reduce the volume of the 


cassette to the point where you get a lot of 
errors, then try and reduce them as much as 
possible with the trim pot. Som patience and 
numberous tries should give good results. I 
slayed with mine for about an hour before I 
got the feel of it. The PEEK-A-PORT program 
in the pre 1981 AARDVARK cataiogs and the 
routine for making a test tape CKILOBAUD, 
Sept, 1980) should be of some help in the 

adjustment process. 

If you have decided that after all you 
cassette machine is the culprit (most cases), 
a good cleaning and a couple of checks may be 
helpful. To perform a head alignment by ear, 
insert the tape and adjust the screw that 
tensions the sound as the tape is being 
played. To perform a speed test, compare the 
playing time of your own machine with that of 
at least three other machines. If the error 
is greater than 1%, the speed will have toa 
be adjusted. Articles on how to clean your 
machine and more details can be found in many 
books and magazines. I found the article in 
June, 1980, KILOBAUD very helpful. 

If you decide to perform a head 
alignment, make sure that you are aligning it 
to a known good tape. To make absolutely 
sure, it is advisable to purchase a tape made 
especially for this purpose. 

Al} of the above adjustments refer to 
the C2/4P, the CiP has the same adjustment, 
the only difference being the locations of 
the trimpots and their designations. I have 


done all the adjustments described above on. 
my own machine and have not suffered from a 
mistoad in over 6& months. The following 
program will hetp diagnose whether your 


cassettes or the recorder are at fauit. 
There are two programs in the listing. 
Program 1 (Clines 16-46) will generate a 
program of all the characters from 14 to 255. 
Program 2 does a comparison check to see if 
the characters saved on the tape agree when 
you try ta toad them back into the machine. 
After you have typed in the program, type 
"RUN" (Cno C/R yet) and start the recorder. 
After the leader has passed, hit CYR. You 
should save for at least 26 minutes (sa use a 
long tape). Rewind the tape, wait for the 
leader to pass and then type ° RUNS’. If the 
program stops immediately, try again as false 
starts can occur. You should be able to go 

for at least 24884 cycles before getting an 
error. To see if the program is operating 

correctly, shut off the recorder and. the 
error statement will come up. If you get an 

error, it is necessary to rewind the tape to 
the beginning as continuation is’ not 
possible. 

1 REM CHRIS LOELKE 

16 REM TAPE TEST FOR CIP, C2/4/8P 

15 SAVE 

26 X=14 

38 POKE14, @: ?CHRSC(XI5: R=X+1 

40 IFX=255THEN2ZH 

58 GOTO36 

64 REM ** RUN 8@ FOR PLAY TEST ** 

7@ REM CHANGE A TO-614486 FOR CIP 

8@ 7:?7"RUNNING TEST":? oe 

99 X=14:A=64512 

148 WAITA,1:B=At+1i: IFPEEKCB) =13 OR PEEKCBI=6 
THEN1 48 

112 IFPEEKCBI=18THENIGS 

113 IFPEEK(B)< >XTHEN ? “ERROR AFTER “sY;5° 
CYCLES* = END 

115 X=X+L:Y=Y+1: IFX=255 THENS@ 

126 GOTO146B 


A MODIFICATION BOX 
by Russ Terrell 


Here is an idea for any CiP users who 
have jeysticks andor a light pen. The 
problem you face is that you do not want to 
hardwire them into the CiP and thereby take 
away from its mobility. Also, you end up with 
wires running everywhere. The solution to 
this problem is an utility box that wil? hald 
both the light pen and joystick circuits. 

BILL OF MATERIALS 


1) Experimenter box with aluminum cover % 
i716 *%® 2 S77 x 1 SYS. tcat. 2re-259) 
2} 15 pin DIP jumper cable - (cat. Z2/5-1976)| 


ao) 24 conductor fFibbon ceblie cat. 268-77 RT 
4) 2 16 pin DIP sockets (or wire wrap) (cat.’ 


2io- lass or. 2<7fh-isas 3 

5} Male 12-pin MOLEX connector 

6) Pro ject baocrd, mounting hardware 
Y) Parts for the other pro jects. 

** NOTE: I used the box listed and built 
the light pen circuit to fit the box, but 
have not, as yet, added the joustick 
circuit. If you have already built both, get 
a bigger box. Many different sizes and 
shapes are available. 

1) Cut a project board to fit inside the 
case. Mount one of the i6-pin sockets to it. 
Use the method that works best for you 
(wire wrap, point to point, etc). If you 
already have the board(s) built, cut a small 
board to mount the 165 pin socket on. 
2) Build the project(s) on the rest of the 
board. 
3) Next, wire the 16 pin socket to your 


projects. The pin tayout I used (for the 
light pen was: 

Cs 1 16 +59 

C2 2 i5 

LS 3 14 

C4 + is 

cS S&S 12 

C6 G& ii «Ff 

Cr f 16 RS 

GND 8 S Ri 
4) Drill and cut all mounting holes for the 


boards and sockets. The case must be notched 
so that the jumper cable will fit through the 
slot when the top of the case is on. 

5) Mount the board(s) to the case. Mount the 
sockets for the joysticks and/or light pen to 
the case. 

6) Take the ribbon cable and cut to down to 
i2@ wires. Cut it to the approprate' length 
Cabout 1/7 inches). - Strip and solder the 
wires to the MOLEX male connector as 
follows: 


1? RL ? GS 
2) R? 3} CB 
a2 Cl ay Ale 
4) C2 16) R6 
So GS 11) GROUND 
6) C4 L2) +5 


*¥*#NOTE:. I get +5 Vo by soldering a wire to 
R67, C58 and tying it to pin 12 of the noise 
port. 


Cut a peice of project board the side of 
a 15-pin socket and mount the other socket to 
it. Solder the other end of the cable to the 
16 pin socket using the same pin layout as 
for the previous socket. Connect the cabie 
to «<P4. The 16 pin socket can exit the 
computer case through one of the holes on the 
left side. Mount the socket board to the case 
between these two holes. 
7) Plug in the jumper cable to each of the 165 
Pin sockets. Watch the pin numbers or you 
may smoke some chips Cit might be a gocd idea 
to clearly mark pin 1 on both the cable and 
connectors so it will be easier to set up). 


Run the test programs for the joystick and/or 
light pen. 
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E~a2. LISTER 
by Kerry Lourash 


If you have 58 free bytes in some nook 
or cranny of your C1P sor C2P BASIC in ROM 
computer you can use £.2. LISTER. E.Z. lets 
you look thru a BASIC program without typing 
in a let of LIST commands. 

Suppose you have aéietlong program in 
memory. Set the E.2. to list eight lines at 
a time by POKES64,8. Tupe LIST and hit 
RETURN. The first eight lines of the program 
will be listed and you can J/ist eight more 
fines each time you hit the space bar. If 
you see a tine you want ts change, hit any 
other key and you’!!! be in the immediate mode 
automatically. You can start listing at any 
fine number or tlist any range of line 
numbers. 

The LIST command is not a subroutine; 
when done, it jumps to the immediate mode. 
This fact makes it rather hard to control. 
The E.Z2. acts as an on-off valve for the LIST 
command by patching in to the output routine, 
which sends characters to the screen and 


tape. As the characters are output, E.Z. 
checks the first byte of the input buffer 
Clocation $13) for the LIST token. This 


indicates a LIST command is being executed. 
When it finds the token, E.Z. increments it 
and uses it as a flag to show whether the 
mine counter Clocation 4143 should be 
_initialized. | 


1@@ @222 gsDezae STA $az—B2 

116 @225 48 PHA 

128 8226 8A TRA 

138 @227 48 PHA 

148 @228 98 TYA 

15@ @229 48 PHA 

168 @22A ADBza2 LDA $a2a2 

178 @22D AGIZ LDX $13 

188 @22F E@g9 CPX #$99 

198 @231 Dees BNE PLUS 

288 9233 Ages LDY #8 

218 9235 8414 STY $14 

228 @237 E613 INC $13 

238 @239 E994 #£=PLUS CPx #$99 

240 @23B DAil BNE CONT 

258 @23D c9aD CMP #&D 

264 @23F Deep BNE CONT 
| 270 @241 C614 DEC $14 

280 8243 Dead BNE CONT 

298 8245 2680FD JSR $FDaB 

388 9248 ca92za CMP #$20 

318 B24A DeBA BNE STOP 

326 @24C C613 DEC $13 

338 B24E 68 CONT PLA 

348 @24F As TAY 

358 8258 68 PLA 

368 8251 AA TAX 

378 @252 68 PLA 

388 @253 4CSSFF IMP $FFE9 

398 @256 A2FE STOP LDX #$FE 

484 @258 3A TXS 

418 @259 4C74Az2 IMP $AZ74 

OMIT ° OK’ 


Now the character to be output is 
examined. If it is a carriage return ($4D) 
the line counter is decremented. When the 
specified number of lines have been 
displayed, the contents of the line counter 
are zero. E.Z2. jumps to the SFDaB 
subroutine for an input from the keyboard and 
returns with the input of register A. If the 


input is a space, E.2. restores the LIST 
token, which causes X additional! lines to be 
displayed. If any other key is input, the 
stack is reset and E.2. jumps to the 


immediate mode. 

Set the number of lines displayed by 
POKES64,¢04 of lines}. E.2. is patched into 
the output routine by POKES3S, 34: POKESSS, 2. 
The program is relocatable but the POKEs will 
have to be changed. For a C2P, the JMP SFFGES 
must be changes to JMP SFF6”. If aq warm 
start is done, E.2. will have to be patched 
into the output routine again. If you want 
to specify the number of screen tines 
instead of BASIC lines, change the terminal 
width Clocation $15) to the number of 
characters/line displayed on your screen. 
POKE15,24 for a C1P and POKE15,64 for a C2P. 
Before SAVEing, you must POKE15,72 or 


PURE 15s 200% Now location $4234 will contrat 
the number of screen lines displayed. Be 
warned that this mode may not display al! of 


the last BASIC line LISTed. 


SAVE A, X, Y REGISTERS 


LIST TOKEN? 


NO, CHECK FOR LIST +1 
SET COUNTER 


"Liat el 

IS OUTPUT CHAR = LIST + 1 
NO, TO REGULAR OUTPUT 

IS CHAR CR? 

NO, TO REGULAR OUTPUT 
DECREMENT COUNTER 

BRANCH IF NOT ZERO 

GET INPUT 

LS IT * SPACE’ 

NO, IMMEDIATE MODE 

RESET LIST FLAG 

RESTORE A, X, Y REGISTERS 


TO REG. OUTPUT ($FFE7 FOR C23 
SET STACK 


TO IMMED. MODE, CHANGE TO $A27D TO 


HOW TO CHANGE DISK BUFFER LOCATIONS 
by Tim WHalkenhorst 


OSI has a good disk operating system, 
but one thing that has always been a problem 
is that it wastes one or two tracks whenever 


disk files are used because the buffers are 
located from $327E to #427E. Your program is 
stored starting at $427E when two buffers are 


used. The disk header begins at $3279 and 
this is where the DOS starts storing material 
on the disk. This header is used to set 
where BASIC starts and the tength af the 


program and the number of tracks needed for 
the program. To save valuabie disk space, we 
can move the buffers. 


For my system, I decided ta move the 
buffers to the highest 4K cf memory af the 
32K available. I also use the RANDOM ACCESS 


buffer #6 the most, so I put it at the end 


becavee I did not want to trap 2k. to do it, 
I did the following: 
13 Call the track zero copy routine in BASIC 


- DISK! "CA B266=13,1 (5S 
have an EXTENDED MONITOR, gait 
first Gi VISKI EN’, then call 
_copier as above. 


174° disk). if you 
the monitor 
the track zero 


2) Select the track zero copy (2) ana enter 
R4206 


a} Now enter E to exit to the DOS. If you 
don’t have an extended monitor, enter BA. 
With an extended monitor, the command is RE 


EM. 4326 should get 4326 YE. Type FF, hit 
the LINE FEED key to open the next location. 


43AC get 43AC 7E. Type FF. Continue until 
allt ltocations on the following chart are 
entered. 

53 Using BASIC, POKE Lf1S4,255. O06 thie for 
al! the remaining lacations. 


6) To save these changes, repeat stap 1. 
7} Recall the track zero copy routine, 
W4268/2270H6,8 and you are finished. 


The address locations are the ones to change 
when track zero is written out to $4266. If 
you wish to check the 
Subtract 8192 decimal 


actual locations, 
or $2060 hex. CREM FROM 
THE EDITOR - This is also one of the easiest 
eolutions to the problem of what to do when 
you forget ta put disk buffers 
program before you write it.) 


under a 


TABLE OF VALUES FOR CHANGING DISK BUFFER LOCATIONS 


#6 BUFFER 
FUNCTION ADDRESS 
INFRG 
START LO 17198 $4326 rae 
START HI 17191 $4327 119 
END LO 17192 4328 265 
END HI 17193 %4329 127 
INPUT LO 17324 43AC 255 
INPUT HI 17325 %43AD 119 
OUTPUT LO 17347 %43C3 255 
OUTPUT HI 17348 %43C4 119 

#7 BUFFER 

START LO 17198 $%432E 255 
START HI 17199 %432F £14 
END LO 17288 $4330 255 
END HI 17281 $4331 119 
INPUT LO 17485 43FD 255 
INPUT HI 17486 %43FE tit 
OUTPUT LO 17438 $4416 255 
OUTPUT HI 17431 %4417 11% 
A BREAKPOINT UTILITY ae 


by Robert Woodward 


x 


I own a SB-II and do a 


language progtamming. BASIC is easier, but 
machine language has always been a lot more 
fun for me. The hardest part about it, 
though, is debugging and the SUPERBOARD 
doesn’t provide anything to help, except 


locations. 
way to list register contents. 


examination 
furnish any 


of memory 


The following program prints out the contents 


of all registe when a BRK op-code is 

encounter in program execution, and returns 
to the program as if nothing has happened. 
It has a few 


ones, but it works. Hopefully, it will speed 
op programming for somebody and the effort 
that went into writing it wil! be well worth 
i 


lot of assembly 


It doesn’ t 


good points and a ist of bad 


32k 


GFF 
$77 
GFF 
%7F 
$FF 
B77 
$F F 
S77 


$F F 
SEF 
$F F 
$77 
$EF 
$6F 
SEF 
$F 


‘The good points: 


24K CURRENT 
255 $FF 1276 $7E 
87 $57 5H $32 
255 FF 126 «$7E 
95 5F 58 3A 
255 FF 126 S7E 
87 857 5H 32 
255 FF 126 7E 
87 $57 58 $32 
255 $FF 126 $7E 
79 «=$4F 58 3A 
255 $FF 126 4$7E 
87 $57 56 $42 
255 FF 126 $73 
73 «$4F 658 3A 
255 FF 126 $7E 
739 =$4F 58 3A 


13 It’s completely relocatable Ccan be 
palced anywhere in memory, but you’ |! need a 
IMP if you move it and use it with a BRK. } 
and uses no memory for variable storage. 

2) It’s transparent to the user program 
(returns with all registers the same as they 
were before the BRK was encountered. } 

33 Most importantly, it works! 

The bad points: 

1) It uses 
stack! 

2) The screen 


62 bytes of page 1 - your 


doesn’t look very pretty 
after a few times. 
Some words of caution: 

1) If your stack pointer is > $CH, 
you’ 11 wipe out this program unless you put 
it somewhere else. 

2) If something on your system will be 
interrupting, €IRQ) you must check the Status 
Register to see if the interrupt was a 
forced break (BRK). 


e INTERRUPT ROUTINE RECDAF 
¢ DISLAYS REGISTERS ON BRE ON SE-IIs RETURNS TO.FROGRAM 


The idea for this routine comes fram 
using many big operating sustems that provid: 
a register dump on a trap. Carlsen’s BASIC I 
ROM was very helpful with some memsry 
locations and itisting of the monitor ROM. 
The trick of using the monitor displeau fo 
ASCII conversion comes from a Bruce Hoyt tap; 
dumpting program I saw. Since than IT’ ve see 
the same trick in a few ather programs. 


; URUER UF PEGISizk LIST S?Y¥eXeAe Py PCL ee CH 
O1C0 © = O1CO 
Y1iCO 42 RECTMP Ss FHA * GAVE A 
O1Ci Re TAR 3 GET x 
ee 40 PHA ry SAVE & 
0103S Pa TTA 7 GET ¥ 
0104 4G FHA , SAVE Y 
O1CS BA Tox » GET CURRENT SPF IN & 
O1CS oA TAR » ALSO IN A 
Oc? 18 LLG © CLEAR CARRY FOR ALC 
OiCd 69 04 ALC #6 s GET ORIGINAL SP REFGRE INT 
O1CA 43 PHA » SAVE IT 
O1CH A? OF LIA #E0R ys LINE FEED 
O1CL 20 20 BF JER $RFST 06s PRINT CHAR IN A 
0106 BO oO? LIY #7 ; oy REGS TE Iss 
O1te RE 00 O1 GTREG? LIA $1009X +s GET A REG FROM LIST. X HAS SF 
O10S oa FC 3TA $FC » SAVE FOR CORVERSTION ROUTINE 
Ol? dF TAR s GET & 
One 48 FHA y SAVE & 
O1D¢ oo TTA y GET 7 
O1 De 4a PHA s SAVE 7 
O10 20 AC FE JaR $FEAC 830s MONITOR DISPLAY CONVERSION TO ASCII 
ODE All Cl fa Lt $00CC + GET HIGH NIBBLE CHARACTER 
oid a) 20 BF JSR $RF20 os FRINT IT 
O1E4 AL Cle fe LIA $HOCH +s GET LOW NIBELE CHARACTER 
OLE? 20 20 BP JSF $RF20 os PRINT IT 
O1ER AY 20 LItf #520 7 SPACE 
OLEC 20 2 BF JSR $RFS0 os PRINT IT 
O1EF 48 FLA y GET YX 
O1FO Aa TAY ¥ RESTORE Y¥ 
OIF] 43 PLA 7 GET & 
O1F2 AR TAX * RESTORE 
O1FS Ee INX y GET NEXT REGISTER 
O1F4 q3 HEY s ANOTHER REG [UGNE 
O1FS Nid we BNE GTREG 95 IF NOT FINISHED, [0 ANOTHER REG 
OF? 4g PLA y FOP OLE SF GFF STACK 
O1FS 6g FLA 5s GET Y 
Oi? Ag TAY ys RESTORE Y 
O1FA 48 PLA , EET XK 
O1FR AR TAX y RESTORE X 
OFC 68 PLA s RESTORE & 
O1FE 40 RTI s RETURN, RESTORE POs FS7SF 
¥ 
} 
+ENTD 


CiP PARALLEL I/O INTERFACE TO A HYCOM PRINTER 
by N. Feliss 


CREM. The program described and presented in 
this article should help any one interfacing 
a parrallel printer to the C1iP.3} 

I recently contstructed ao parrallel 
interface to run high speed electro-chromic 
printer by HYCOM (Model DC4904 48 cols., 177 
cos, $178; IB-28A interface board, $165). In 
figs. 1l and 2, I show how a M6821 PIA can 
been linked to the C1P sustem at ad EUS to 
EOUB. Basically, the data and address lines 
were wire-wrapped from the socketed U1 Con 
the Cl board?) to aiesmall vector board. Ai 
‘74LS138 provided address decoding and 8T28 
provided the necessary data line buffering 
see fig. 1}. However, for easiast 
implementation and minimum work, a PIA 
printed circuit board with 8K RAM can be 
obtained from AARDVARK for 29.95. With 
either system, the user must make sure that 
there are two data buffer chips (8T28) on the 
CiP board. The user must supply these two 


chips in order to provide data output. After 
the PIA has been wired in with either system 
it must be checked for correct operation with 


the 


‘CIP system. The following program 


intitializes ports A and B of the PIA as 
outputs: Ree ee aa ay 


18 X%=57352:REM BEGINNING ADDRESS OF PIA 


CEQKE 3 


26 POKEX+1,6:POKEX, 255: POKEX+1, 4: 

POKEX , @: POKEX+3, @: POKEX+2, 255 
SBPOKEX+3, 4: POKEX+2,@ 
Before testing the two data output ports 


of the PIA, it is important to tie the B side 
of the PIA (CPBH - PBY? high via 14K resistors 
(the B side is normally open collector 
output). Also, if the PIA is decoded ata 
different address, line 180 in the above 
program must be changed to reftect the new 
address. To test for correct PIA hook-up, 


simply type: 


POKEX,N CA side output) 
POKEX+2,N ©B side output?) 


where WN can be any interger between @ and 


25 « 


For example, typing in POKEX,U will 


cause all the bits (PAB - PAY?) on the A side 
to be tatched low. Taking a DVM cr logic 
probe and testing the status of these bits 
will reveal whether the system is functioning 
of not. If this part of the circuit is 
working then one can procede on. 
the PIA interface is suspect and the data, 
address, and clock lines, and chip select 
lines to the PIA must be checked with a logic 
probe or an ascillascope. 
in order to use the parallel data output 
for directing data or BASIC program listings 
to a printer, the ROM BASIC 1/70 subroutine 
modified. An I/0 vector is written 
($821A=69 and $821 B=FF? upon power 
ROM BASIC 


must be 
inta RAM 
on, cold, and warm starts by the 


system. His wector, Frees, directs <i} BASIC 
output to the TV screen and/or cassette. By 
changing this vector to a location in the 
unused RAM space (8@222-22FA) cone can 
implement a different output routine. The 
cassette flag is at 4265. Ir. 74" 1S 
presen all data is directed to the ITV and 
cassettea; if a’ is in that location, the 


cassette routine is bypassed. 

Using this same approach, a small 
program can be written using a flag to 
indicate writing to the printer and TY 
screen. A flow chart describing the correct 
logic flow is presented in fig. 6. The 
printer flag is located at W222, the 
beginning of the user-Ram space. The flow 
chart for the printer subroutine is presented 
Several handshake lines are used 
to indicate the “ready state" of both the 
computer and printer. The computer handshake 
lines to the printer are designated SI, shift 


in iG. Fx 


in; ond: EOL, end of line. The printer 
handshake line is designated IR, input 
ready. 


Basically the operation of the printer 
works in this fashion: 1) a character in the 
A register is directed to the PIA-B side for 
output to the printer. 2) the SI line is 
pulsed high-low via PIA-AW causing the 
interface card to accept the data character. 
3) the IR line is tested for a high level 
indicating to the computer that the interface 
card is ready to eccept another character. 4) 
another character is loaded into the A 
register and tested for carriage return 
repeated, if it is a CR then EOL is pulsed 
high-lo. 6) Step one is now repeated. 

A software listing of the printer 
ocntroal program is presented in figs. 8 and 
as This program is written in 6582 machine 
language starting at user RAM address 6223. 
A complementary PIA initialization program is 
presented in fig. 16. This BASIC program 
sets the PIA for correct handshake operation, 
initializes ports A and B as outputs, turns 
-on the print flag at 6222, and intitializes 
a new output routine vector at address 821A 
and @21B (621A=23 -and 8621B=@2)3. These two 
programs can be joined into one BASIC program 
with the use of DATA statements. An example 
of this technique is given in fig. 11. This 
short program can be executed whenever the 
printer is to be used after power is turned 
on to the entire system. For a cold or warm 


start, operation, only statements 84 and 324 
in fig. 11 are needed and can bee typed in 
one at a time and executed. Whenever it is 


necessary to turn the printer off, the print 
flag location can be loaded with a zero. 

For best operation, the printer should 
be positioned as _ close as possible to the C1P 
computer. The ICG cables from the PIA to the 
HYCOM printer control boerd should not 


it not ther 


10 


exceed two feet. It appears that the 
printer control board uses CMOS circuitry and 
is very noise susceptible. 
reliable operation keep the 
use braided shielded cable for 
lines and remember to ground 
Ailsa, tlat ribbon cable can be 


as a result, it 
Therefore, for 
cables short, 
the handshake 
the shield. 


used for the data output lines from the B 
port to the PIA of the printer control} 
board. 


In summary, a PIA can be easily linked 
to) the CiIP or SUPERBOARD system for paraliel 
I“O connection to a printer or typewriter 
system, i.@., @ Selectric printer. A small 
program for transmitting a character from the 
A register to the PIA osutput port with 
handshake logic can be sasily written for any 
system. The operations described in this 
article can be easily modified and tailored 
for adaptation to any system requiring 
parallel IYO data linkage with handshake 
logic. 


PULSE, FOL 11 | 


a 


VWiA PIA~Al 


FULSE ST H/ 
ie 
Qo 


VIA PIA -AD 


OUTPUT DATA 
FoRT B PIA 


FULSE SZ VIA 
LPIA - AS 


oF] lu o 


GET HOLE 
DATA 


1846 8223 Z2B2UBF JSR A SBF2D PRIN?’ CH IN A TO TV 


119 @226 49 PHA 
120 @227 ADBSaz2 PHA 
138 g22A Fa19 BEQ Li 
148 B22C 58 PLA 
158 @22D 2@BIFC ISR A $FCB1 OUTPUT CH IN A TO CASSETTE 
168 9236 caap CMP I $a0 CH=CR? 
178 @232 De46 BNE L6 NO, BRANCH OUT 
180 9234 48 PHA ’ 
199 9235 aA TXA 
20G 8236 49 PHA 
218 B237 AZBA LDX I BA SET CNTR TO 18 
278 a239 Asse LDA I $00 LOAD NULLS IN A 
238 8238 2BBIFC JSR A SFCB1 OUTPUT 19 NULLS TO CASSETTE 
248 G23E CA DEX 
258 G23F DaFA BNE LS CONTINUE 
268 8241 68 PLA 
278 B242 AA TAX 
288 4243 68 PLA | 
298 9244 6a RTS FINISHED WITH CASSETTE OUTP 
328 8245 ADZZB2 LDA A $8222 FLAG FOR PRINTER, i=PRINT 
318 8248 FO2F BEQ L4 . 
328 a24A 68 PLA 
330 8248 csaD CMP I $aD CH=CR? 
340 a24D pa13 BNE NCR NO, BRANCH OUT 
358 @24F 48 PHA YES, SAVE CRYEOL, SI=HI 
368 8250 asaz LDA I $82 SET EOL HI 
378 B252 SDaSEa STA A PIA STORE IN A SIDE’OUT TO PRNTR 
380 9255 Aga3 LDA Il $03 SET SI HI NOW 
398 8257 snasea STA A PIA STORE IN @ SIDE’OUT TO PRNTR 
48G @25A agaa LDA I $00 Nol SI AND EOL Lon 
410 B25C spas3a STA A PIA STORE IN A SIDE“OUT TO PRNTR 
42@ B25F 4C 7992 IMP A L4 | 
430 8262 sneasa STA A PIA+Z STOR CH IN B SIDE 
440 8265 48 PHA 
458 266 ADBAEB LDA A PIAtZ2 CLEAR BIT 7 B SIDE 
468 @269 Aga LDA I a1 BIT @=1 FOR SHIFT IN 
478 G26B SnasEa STA A PIA STORE IN A SIDE/OUT TO PRNTR 
488 @26E age LDA I $aa SET SI Low 
498 @272 aneasEB STA A PIA STORE IN @ SIDE’OUT TO PRNTR 
58a a273 EA NOP 
Sig a274 ADGREB LDA A PIA+3 SEE IF PRNTR RDY (9-1) TRANS 
S20 @277 1QFB >PL ‘ae 
53a 9279 68. PLA 
54a @27A 6a RTS FINISHED 3 
, END : ; OST SAIA OVUTPOT KOOTILE 


5 REM PRINTER CONTROL PROGRAM } ! FRINT CHE IN A 
10 X=57352 TO TV SCCEEI 
15 GOSUBIBaB 

24 POKEX+1,@:POKEX, 255: POKEX+1, 4: POKEX, @: POKEX+3, 8 

36 POKEX+2, 255: POKEX+3, 38: POKE546, 1: POKES38, 35: POKES39, 2 
196 END | 

1988 REM THIS SUB POKES PRINTER MC INTO MACHINE LANGUAGE 
1981 REM FOR VECTOR PUT 34 INTO 11 AND 2 INTO 12 

1982 FORIN=547T0634 

1984 READOP:POKEIN, OP 

1986 NEXTIN 

1818 DATASZ. 45, 191,72, 173. 5.2 

1928 DATAZ4O, 25, 184, 32,177,252, 281 

1838 DATAL3, 288,78, 72, 138,72, 162 

1948 DATAIG, 169,B8, 32,177,252, 282 

1958 DATAZBS, 250, 184, 178, 184,96,173 

1@68 DATAS2, 2, 240,47, 194,201,13 

1878 DATAZ@S, 19,72,169,2,141,8 

1988 DATAZZ24, 169,3,141,8, 2224, 169 

1899 DATAG, 141,8,224,76,121,2 

1190 DATAL41, 18,224, 72,173,18, 224 

111@ DATAI6S,1,141,8,224,169,9 

1128 DATAL41,8, 224, 234, 173, 11,224 

1138 DATAIG, 251, 144,96 

115@ RETURN 
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PICG DOS DISK INITIALIZATION 


This program will initalize a blank PICO 
DOS disk for program storage. It will not put. 
the DOS on track 6 so” you will have to boot 


up with a regular PICO disk. 
S INPUT‘ INPUT PROGRAM#" iN 

19 NT=3#4*(N-1):FORI=NTTONT+3: 7?" TRACK “I 
26 ST=C(CL-INTC 1718 )#1834+¢ 16%C INTCI716)73 
38 POKE2Z5@,ST:REM TRACK IN BCD 

46 POKE11,224:POKE12, 36:REM TRACK SEARCH 
ROUT INE 

SQ X=USR(CX):REM SEEK TRACK 

64@ POKE11,46:POKEi2,39:REM INIT ROUTINE 
7Q@ X=USRCX):REM INIT TRACK 

8G NEXT 

NOTE POKES656,9 WILL LET YOU STORE A PROGRAM 
IN SPACE #97 


This came from Dave 
our new GALAXIAN program. 


Pompea, who also wrote 


FRED ELLIOT, PORTLAND, OR 9726565 
Two more lines are needed 

instructions for converting the C274 CURSOR 
to more than 4k systems. The 34s in lines 
S66 and 788 need to be changed to the value 
of X given in the table published with the 
instructions. The additional steps make the 
CURSOR work great with my SK system. 


in the 


WE GET LETTERS 


THOMAS OWENS, 
FPO MIAMI 34858 

Thought I’d write and 
necessary pokes to 
Straighten the video out 
With 48 characters per line. 
gotten a tot of tletters 
help other people. 

As an explanation: my screen is $D4@B8H to 
$D7FF with the cursor at $D748. 
Width is seen in line 188 as %$D748 to SDT 77 
HEX. IT have this program in the directory 
under the name POKER) and, just select it 
initially when I boot the disk, then it runs 
the BEXEC#. It works well and (backspace and 
all) and only takes a second to run. 


AUTEC-ANDROS ISLAND, SITE 2, 
enclose the 

OSG65D required- to 

on my SUPERBOARD 
You’ ve probably 
on this seo it may 


483 character 


16 REM POKER 

28 POKES667 , 215: POKES677, 215: POKES685, 215 

38 POKES756, 215: POKES757, 215: POKES754, 215 

48 POKES776, 215: POKES786, 215: POKE9981, 215 

5@ POKES864, 215:POKE9S811,215:REM-WE JUST = 
ALL. *DSs" 16 *D¥7e" 


13 


6@ POKESSHYH,64:REM SCREEN WIDTH 

84 POKES743, 255: POKES723,63 

1466 POKES7T6565, 72: POKES77&, 72: POKESH7G, 119 

114 POKES72Z5, 7: POKES/730,16:REM BACKSPACE JIMP 
VALUES 

126 RUN”* BEXEC#" 


Another method with disk is toa just put 
the routine in the BEXEC*® and when you boot 
the disk the routine is POKEd into memory. 

Thanks for pointing out the intitial area 
to work in. IT’ t! be glad to help anyone with 
their video problems. 

CREM From editor. This will also work with 


64 character wide conversion and, if you 
leave out the OY changes, with the model 2 
CiMF 3 
DAVID KILROY, WINDHAM, OH 442588 
A littie tidbit - to test at what 


frequency your disk based machi running, type 
PRINT PEEKCS9851). 
If ltese than S@ it’s at iIMnZ 
If SO: to 186, it’ = et 2H! 
If greater than 166, it’s at 3.3MHZ 
E. MORRIS, MIDLAND, MI 48648 
Those OSI backpane connectors which 
everyone seems to have a hard time finding 
can be purchased from Technical Products, 
Box 12983 University Station, Gainsviltle, FL 
326864, at $4.95 for a set of 4 pairs (8 
pieces). 
GEORGE RANCHOR JR, KLAMATH FALLS, OR 975B1 
The statement SAVE:PRINTCHRSCLS)ELIST 
will create a program tape that will not echo 
to the screen when loading. 
NELSON REYNOLDS, MT CLEMENS, MI 48643 
On Pete Kellner’s tetter on tloading 
tapes without printing to the screen, I found 
out how it works. Seems that the input 


routine at SAS57 has a little routine to 
detect the input of a CONTROL O ($87) for 
either keyboard or tape input. As the input 


routine also strips the MBS from the incoming 
character, the stop token ($87) will also be 
detected as a CONTROL O. When the input 

routine detects a $47, it sets the control O 


flag at $8064 which supresses further 
printing until cleared Cin this case, at the 
end of the LOAD). Now for implementation. 


The easiest way I have found so far is to 
write a iine like: 
63608 
SAVE: PRINT: PRINT: PRINTCHR$( 15): LIST-62008 
and then RUN 62898@ to save the program. Upon 


loading, all you will see are the carriage: 


returns from the first two PRINTs and the ‘OK 
prompt at the end of loading. The first two 
PRINTs clear the initial noise garbage and 


let you know that there is something going 
into the machine. CREM from the editor - ya, 
I know we have run this hint before, but the 
letters were nice so I printed them anyway. ). 
LtCOL CURTIS PRESTON, SHALIMAR, FL 32579 
Here’s a routine for formatting dollars 
and cents. Use as a C1-P subroutine at 4908. 
No matter how you enter the dollar amounts 
in D, the routine will adjust for two places 


after the decimal! and also return a TAB vatue 


CP) toe columnize at the 
screen. 

4486 BS=STRS(DI+" .4B" 

4610 FORC=1TOLENC BS): IF 
MIDSCBS,C,13<>"."° THEN NEXT 
4426 L=C+2: BS=LEFTS( BS,L?> 
44630 IF RIGHTS(BS$,1)="."° THEN B& = 
LEFF TSC BS, b.-1 34+"S"* 

4999 P=23-L: RETURN 


right side of the 


SCOTT HUNTER, Eohemia, NY LiIYViS 
To put some zip into your ALIEN INVADERS 
game add or replace the following |ines: 
285 TU=TU+1:bl=6: IF TUSSTHENTSS 
346 NE=9:Q=6: FORY=WTOLSTEP-1: FORK=17T08: 
AT=TU+X+X4+L2#Y =: P=PEEKCAT 9 
S16 IFPCS2THEN POKERT, S32: 
Q=Q+INTCY/W): IFNE=@THENGOSUBSY 
683 Ci=5-C1: IFQ@=@THENNW=W-1 
687 Cdelete) 
As each successive row from the bottom 
gets wiped out, the program doesn’ t bother to 
check it anymore. 


POKEAT+D1I,Ci: 


BILLY D. SMITH, RICHMOND, KY 40475 

I would tike to take exception to Scott 
Klavon’s letter in JOURNAL #5. I also was 
one of the first tc buy the modification kit 
from Progressive. The price of the kit was 
$39.95, not $76.88 as indicated. Any 
modification, no matter how complex or 
insignificant will void your warrenty with 
OSI and the company made that point clear up 
front. The completion time was between two 
and a half to three hours, including contact 
with Progressive to receive corrections to 
the modification I did not have. However, I 
have a stong background and experience doing 
this sort of work, and as such, feel that 
considerable more time would be required by 
the average hobbist. The modification worked 


as axplained in the modification (sic} after 
corrections and a switch selectable 32/64 
character line was available. I agree with 
you completely that the modification is not 


for everyone and have personally recommended 
against installation to all but a few 
qualified people, for many of the same 
reasons your stated in JOURNAL #3. However, 
that 32 X 64 format without guard bands is 
definately not the partiular modification 
Progressive sells. I feel that the mod when 
properly installed and supported by new ROM 
chips is quite acceptable by any standards. 
CI would not use any mod of this nature 
without ROM support. } 

CREM “including contact to get 
corrections"??? - my earlier comment stands. } 


DAVID LOCKWOOD, ELK GROVE, CA 95624 
Iam very glad to hear that you are now 
an OSI dealer. Our loca! dealer has dropped 


the OSI line and left me in the turch. ‘You 
see, 1, unfortunately, acquired plans’ for 
that now infamous video modification from 


Not only is my 686 board incredibly 
up from hundreds of hours of work 
trying to make the mod functional, but most 
Cif not alld of the chips were zapped ina 
construction accident. Can you sell me the 
OST BASIC ROM chips? If already have the 
power supply, cabinet, manuals, etc. 

(I’m afraid I have nothing but bad news 
for you. OSI has in the past sold those ROM 
BASIC chips separately althoqugh they are no 
longer in the catalog. However, when sold 
separately, they went for G10W a set. i 
might suggest at this time your best bet 
would to be to look for an old SUPERBOARD, 
either left over models from a dealer ora 
used ane. It might be wiser than buying just 
the chips for $160 Cproviding OSI still sells 
them) as it would give you replacement parts 
for the entire board. 


Canada. 
chewed 


1h 


JIM HABOUSTAK, SOUTH 
EUCLID, OH 44121 . 
When using 
on disk systems, using a 
variable 
is useful 


variable names for integers 
end af tha 
name saves considerable memory. It 
for such thngs as bowling scores, 
screen pixels, etc. Fi matrix *AC62,62>)" will 
leave about 226 bytes of frea memory. An 
“AS(62,52)' will leave about 8158 butes free. 
But an ’AKC62,62)2 will leave about 12,125 
bytes free! (This is on my 32K COP-DF). I 
don’t know how this will work on other 
machines or on ROM BASIC. 
ROBERT WOOD, ST LOUIS, MO 63136 


needed a reverse scro}!} 
subroutine in order to present some data ina 
more logical farmat. 
BASIC was too slow, 30 £ coded it in machine 
language. The subroutine was written for a 
SUPERBOARD II using BASIC in ROM. It 
currently scrolls a 32 x 32 screen but may be 
changed to any format desired. It’s 
written to reside in page 2 and to be used as 
a USR function, but with a little work it may 
be placed anywhere. if you try different 
values of the scroll! size (now set at 32), 
you will get some very interesting results. 


I recently 


The first program in 


screen 


1 REM REVERSE SCROLL DEMO 

& REM BOB WOODWARD 

1@ FORG=546T0OS97 : READU: POKEG, VU: NEXT 

4246 DATAIGG, 32,173,8,212,153,8,212,56 

30 DATALYS, a?,2, 239, 1,141, 37 ,2,141,42 

40 DA, Df a,50,2,299,6, 141, 58,2, 141,41 
36 DATAZ, 261, 267,288, 223,169,89,141,37,2,141 
64 DATASG, 2, 169, 212, 141,38,2,141,41,2,396 
76 POKE11 ,34:POKEIZ,2 

SB FORG=6TO31: POKES3247+Q,4: X=USRCX): 
POKE53247+@Q,32: NEXT 

36 FORG=31TOS@STEP-1:POKES3247+0, 32: NEXT 
148 GOTOS8H 

THE ASSMBLER VERSION: 


166 8222 AG 28 SCROL: LDY *#%26 
3 SCROLL LENGTH 

116224 AD 66 D4 LOOP: LDA $D486G ;LAST 
LINE TO SCROLL 

126 8227 33 464 D4 STA D480,Y 
;LAST LINE + SCROLL INCRE 

1s@ 422A 38 SEC 

;9ET CARY FOR SUB 

146 822B AD 25 62 LDA $8225 
sGET LAST POS LOW BYTE 

156 8622E ES @1 SBC #31 
>NEXT POSITION 

166 8234 8B 25 82 STA $8225 

176 8233 BU 28 82 STA $8228 

186 6236 AD 26 &2 LDA $8226 
;GET HIGH BYTE 

196 6239 ES 86 SBC +¥%4 
;SUBTRACT CARRY FROM LOW SUB 

266 423B SD 26 42 STA $6226 

210 823E SD 29 2 STR $8229 

224 8241 cS. GF CMP #%CF 
;sALL DONE? 

238 8243 Be DOF BNE LOOP 
SOT YET 

246 8245 AS 48 LDA #88 
>RESTORE POINTERS 

2546 B247 mw 25 Be STA 6225 

2646 G24A~A oD 28 B82 STA $8228 

276 6240 AS D4 LDA #804 

286 @24F SD 26 82 STA #6226 

296 4252 SD 29 82 OTA $8229 

360 6255 6B RTS 


CHARLES STEWART, ADRIAN, MI 45221 


Enclosed is a {ittie program I have been 


using instead of purchasing a TI HEX-DEC 


calculator. Since the TI is 58+ and z 


already have the computer, it might as well 
make conversions for me. I have found it 


quite handy in my work with machne language. 


1@ REM CHARLES STEWART 
6@ REM DEC TO HEX AND HEX TO DEC CONVERSION 
196 DIMAG(16),S%(16):FORX=1TOLG: READAS( X):RE 

ADS#$( X%): NEXT 
116 DATAGGSS,8,00@1,1,89818,2,9811,3,6190,4,8 

161,5,9118,6 
12@ DATAB111,7,1888,8,1961,9,1818@,A,1811,B,1 

198,C,1161,D,111G,E 

136 DATAL111,F 

135 S#="G12345678SABCDEF " 

14@ X=@8:Y=@:W=68: G=@: 1=8:ES="@" 

145 FORX=0T049: PRINT: NEXT 

15@ PRINT:PRINT"A> DECIMAL TO HEX *:PRINT 
16@ PRINT"B) HEX TO DECIMAL" :PRINT: INPUT" YOU 

R SELECTION’ ;AS% 

178 IFASCCA$I=65THENPRINT"DEC TO HEX CONVERS 

ION" : GOTO381B8 
188 PRINT"HEX TO DEC CONVERSION": GOTO2B81B 
2@1@ PRINT: INPUT°HEX NUMBER"; 1%: IFLEN(C I$) >4T 

HENZ2818 
2820 IFLEN(C 1% < >4THENI$=ES+1%: GOTO2828 
2846 FORX=1T04:FORY=1TO16 
2@5@ IFMIDS$( 1%,xX, 1 }=MIDS( S$, Y, 1 JTHENBS( X)=AG 

CY) 

2468 NEXTY:NEXTX 

2070 B1S=BS( 13+BS(2)4+BS( 3348804) 

2888 PRINT:PRINTI&"* IN BINARY=":PRINTB1S 
21@@ X=1:W=@: Q=LEN(B1%): I= 

2128 Y$=MIDS( BLS, GQ, 13: Y=VALC YS): 1=Y*X:W=W4+1: 

X=X#2 

213@ Q=Q-1: IFQ< >@THENZ12@ 

2135 PRINT:PRINT°‘IN DECIMAL “Ww 

2148 INPUT"READY TO CONTINUE"; AS: GOTOZ@1B 
3@1@ PRINT: INPUT" INPUT DECIMAL NUMBER";1@:I= 

VALCI$3:Y$="  *:Y=65536 
3@12 Y=Y/2 
3015 IFY>65535THENPRINT "TOO LARGE” :GoTO?Z158 
3038 X=INTCI“Y ): IFX=@8THENYS=Y%+"@" : GOTO385B 
3040 YS=Y$+"1":I=1-¥ 
3@5@ Y=Y/2: IF INTC Y J=G@THEN3S288 
3468 GOTO3a83g 
3204 PRINTI&" IN BINARY = "YS 
3218 X=2:Y=4 
3215 RES=" * 7 
3220 AS=MIDS( YS, X,Y}: FORW=1TOLG: IFAS=ASB( WITH 

‘-ENRES=RE$+58( WW): GOTO3245 
32380 NEXTH 
3248 X=X+4: IFX>1L4THEN3S2Z6G 
3258 GOTO322a 
3268 PRINT:PRINTIS$" IN HEX = "RES 
3278 GOTO15a 


JC.- A BASIC COMPILER FOR OSI - 

This one is good news and bad news time. 
The compiler is available from PEGASUS in 
Honolulu. At the current time it is available 
only for 8" disk and 48K is suggested. 
Pegasus has plans to offer it on 5" disk in 
the near future, but no tape version is 
planned or likely to be even possible. 

You may have seen the adds for this one. 
It is advertised as "“F-BASIC” and sold mainly 


on The basis of speed. the authors claim 
that it is 186 times faster than basic. 
Let’ s cover the good news first. .It does 


compile basic code into native 6542 code and 
it does run at something like 18@ times the 
speed of BASIC. 


ay 


Although the language is timited, it does 
allow you to use just about any fegal 
construct, na matter how inefficient an still 
write fast - FAST - code. It seems to be 
pretty much bug free. - I can’t guarantee 
EnaTt ; however, for reasons that I’ 1! cover 
tater. It also adds a few features that you 
ao not get in regular BASIC. You can, tor 
instance, specify the location in memory for 
arraus. and you can manipulate the register 
contents on the 6582 directly. It also adds 
WHILE and WEND statements to the BASIC. Ca 
WHILE-WEND statement is simiiar to FOR-NEXT 
except that a condition is tested rather than 
a variable incremented in each !aop.) 

There are some limitations and problems 
with the program. A list of the reserved 
words may help to clarify them. 


AND ASC CHRS DIM END FOR 
GOSUB GOTO 
ae INT NEXT NOT OR PEEK 
POKE PRINT 
REM RETURN THEN TO WEND 
WHILE 
That’s it - the entire language. Note the 


lack of INPUT, atl string functions except 
CHR and ASC, and trig functions. This is 
definitely a games writing package - ora 
package to write USR functions that will be 
added to a BASIC program. It is a very 
}imited package. I fee! that the advertising 
which lead me to expect something closer to 
standard MICROSOFT was somewhat misieading. 
Also not advertised was the fact that this is 
an integer basic with only positive numbers 
allowed. The number range is @-65535 and 
wraps around If you go overrange. Ci.e. 
65535+1=6). It is adifficulit to get used to 
the differences and we have yet to get a 
program of any length to run under F-BASIC. 
You have to get: used to doing things that 
BASIC normally does for you, such as 
providing a delay between POKEing the 
keyboard and reading out the keypress. Of 
course, the difficulty could reflect my skill 
level more than the utility of the program. 

Memory usage may also be aéproblem. the 
system may take a lot more space than BASIC 
would to hold the same program. As the 
author put it, the compiler was written more 
for speed than for memory economy. That ddes 
sometimes tead to problems. Recently Bob 
Retelle wrote a missle command program in. 
BASIC in a little under GK. When compiled, 
the program (Cor the portions that worked). 
ran a tot faster (so fast you couldn’'t see 
the missles move.) but the system reported 
that it used 18431 bytes to assemble it. Not 
all programs we tried ran 2 i/2 times as long 
as BASIC, but that was a problem. 

Pegasus says that the INPUT and DOS 
routines are essentially done and simply 
waiting for final testing before being: 
distributed. They also report that a string 
handling package is in the works. 

Where does it stand now? - as a rather fun 
but expensive toy. If you can afford $1546 for 
a fun program or if you must have speed at 
all costs and can get by with the limited 
BASIC language, it does seems to work ~- and 
while we haven’t succeeded in getting much 
working om it yet, it has been fun. 


NEW AT RARDVARK 


We have been busy again} 

As you may have read in the rest of the 
Journal, we have added a number of machine 
code utilities. We are paricularly proud of 
the MACHINE CODE TRACEEDITOR from Steve 
Jones. It is one of the best debugging tools 
that I have ever seen. Steve did an 
excellent jab and by letting us sell it at 
$24.95, he should be making it available to a 
lot of people. Lt is a bergain. 

we alsa added a mini-assembler in BASIC 
for 9.95. It is limited in the size of 
program it can deo, but it is a two pass 
assembler with labels and branching. It’s a 
nice item for the beginning programmer. The 
MACHINE CODE TRACE in BASIC is also a bargain 
at Siz, SS. 

For disk users, we have a great new copy 
program. It is in Machine Code and wses less 
than 2K of memory, making the rest of the 
memory available for copying. we use it for 
production here because it is better that 
dual disk copying . Fantastic Copy (1 ran out 
of names!) $24.95 

Best news for the fun loving group isa 
couple of new games that are as good as the 
arcade stuff. 

GALAXIA - all machine code, available for 
all video systems. $9.95 on tape, $12.95 on 
disk. An Invaders like game with fast and 
aggressive aliens. For all of you who |oved 
Cand tired of) INVADERS. This one has the 
smoothest and fasted graphics [I have ever 
seen on an OSI. 


INTERCEPTOR FOR THE CiP 8K TAPE OR DISK 
$15.55. 

You have to protect your cities from Hordes 
of incoming aliens. You get a couple of 
automatic cannons to help you, but the 
action is fast and gets faster with each 
wave. This is beter than most games you see 
in arcades. It is fast, smooth, and 
exciting. 

We also added a couple of new data sheets 
for disk users. MULTI PURPOSE MEMORY SORTING 
SCHEMES ($4.95), BASIC PROGRAM EDITING USING 
6D DISK DATA FILES ($3.08), and HOW TO USE 
BASIC COMMAND FILES ($1.90). I particularly 
reccommend the editing and command files data 
sheets,. they contain disk uses that most 
people have not thought of. 

EPSON PRINTERS -MX-88 I tike the new 
Epson - so much that we dicided to carry 
them. We’ ll even run each one on an OST 
system before we ship it!. The printer goes 
for $575 and you need a serial interface 
that sells for $69 

THIS MONTHS’ HARDWARE SPECIAL IS THE 8K 616 
BOARD for $269. 

LAST -- AND LEAST - AARDVARK T-SHIRTS IN 
SMALL, MEDIUM AND LARGE WITH A BIG GREEN 
AARDVARK AND THE LOGO $5.95 


One final note. I have heard from Orion and 
others that Orion has a whole new catalog 
including a machine code ASTEROIDS game that 
is supposed to be great and the new Grafix 
hi-res video board. Those of you who haven’ t 
gotten an Orion catalog recently might want 
to contact them again. 


A NEW INTELLIGENT TERMINAL PROGRAM 


I’ve watched the developement of oc ney 
intelligent termina! program for polied 
keyboard syustems being developed at the 
COMPUTER CONNECTION 38437 Grand River, 
Farmington Mi 48818. {it is a very wel! done 
program and I was very surprised when they a, 
decided to offer it for sale at $159.95 
($23.35 fer 8"). That makes it a real deal. 
The program offers a tot of spticons Chalf and 
Full duplex, even or odd parity, any acia 
driven, etc.) and offers a neat plus ina 
routine that allows you to store up to 8B 
messages for later transmission. (passwords, 
protocols, names and so on.) It alsa provides 
disk buffers for data transmission to and 
from the main frame. 

These of you looking for terminals should 
{ook into this program. 


OOOPS AND GOOFS AND RATS!!! 


We did it again!. More goofs. The uniabled 
pot om the video mod schematic last month was 
a 266 ohm. 

There was an extra line in Helicoptor 
Pilot. Delete !tine 441 to make it run right. 


CLASSIFIED ADVERTISING 


C2MF - 24K SINGLE DRIVE MINIFLOPPY. ONE OF THE 

LAST C25 BUILT, IT HAS ALL THE FEATURES OF THE 

C4MF CCOLOR, SOUND, 2 MG CLOCK) EXCEPT THE AIS 
BOARD. A REAL WORKHORSE HERE AT AARDVARK $895.48 er 
NOTE. - THIS 15 A USED MACHINE. 

CONTACT OLSEN AT AARDVARK. 


SUPERBOARD MODEL 1 SK ANOTHER PIECE OF OUR 
EQUIPMENT. $225.68 
OLSEN AT AARDVARK AGAIN. 


EKEKEASEHEHE SERBS SET BFE 


AT LAST! WE’ LL CONVERT YOUR CLP TO RUN, CREATE, 
AND DISPLAY AND C2/74P SOFTWARE; PERIOD! DONT 
WORRY, WE’LL DO IT! 

ALSO: 

CONPLETE RTTY/ASCII/MORSE WITH T’U INSTALLED 


$178.86 

1204 BAUD $34.46 
S@@ BAUD STANDARD ! PLUS NICE DUMP ROUTINE. 
WRITE FOR DETAILS : OVES. 1111  CHAPLINE ST. 


WHEELING WU. 26083 ; _ 
$HLKKKKEKHEEHHKEASEKEBHES EEK SEES 


This months’ ltead program is really three the Gobbler and called it 

programs in one. It is also a good example of (Mongols were hard to contol too0.?). 

how a program get grow to0tally out of INTELLIGENCE MODE exfriend - 

ae en aquaintance said 
Program 1. Artist. I had just returned soon as the tittle Gobbler would eat himself 
from Radio Shack and had been impressed with into a corner and stop too scon. 

a random picture drawer that they were a poutine 68 let the Gobbler 

running. (It was a lang, long time aga.?. last position and back up 


Program 3. MONGOL HORDES ex-friend said it 


was boring with total control 


system 


you influenced rat 


The screen would fill with boxes and a they Siind allen. Came “out with 
would go off at random creating a picture. intelligent looking construct. 

Friend shows up at house and I decide to The stranger at my keyboard still 
impress him with how I can write a program impressed. There as a stight 
(picture maker?) while he watches. In twenty gobbter left behind an image of 
minutes we have ARTIST - which I still like eeu it backed up. 

to watch. Friend is not repeat not Ta Meck with him, 2 like it. 
impressed. PS. I’) give a 


program 2. Gobbler. Friend wants to control first person who fixes the bug 
picture maker. I add controls for up, down, program. 
left, and right. - Friend is not impressed. 


S PRINT'HIT SHIFT TQ START" 


17 
20 
ot 
OQ 
45 
es @ 
60 
7Q 
8O 
FO 
100 
140 
120 
1-30 
135 
140 
150 
160 
170 
180 
iSO 
ZOO) 
210 
mel) 
Zo) 
240 
ea) 
2O0) 
2/70 
=BO 
ery 
BOQ 
210 
Pr 
340 
tert) 
340 
a7? 
S80 
290 
4oOog 
420 
a 
440 
450 
4460 
470 
480 
490 
BOO 
iO 
wet) 
a 


we 
So 


IFPEER (357088) =10ORFEER (57088) =254THENR=RND (8) s GOTO17 


FORX=17TO25:FRINT:NEXTsPRINT"FPICK A GAME (RY NUMBER) "sFRINT 
FRINT'L ARTIST'sFPRINT'S MONGOL, HORDES 


INFUT'"S GOBBLER' Ys TIFYS3THENZSO 
INFUT"GIVE ME A NUMBER FROM 1 TO 1O";5R 


2=Y+8s TFY=2THENZ=2 


INFUT"DO YOU WANT INSTRUCTIONS"; AS 


J=Y¥s IFASC (A$) =B9THENONYGOTOS10, S50, 630 
Pil=1sl=64: VR=340: IFFEER (S7088) -127THENVR=600 


IFVR=600T7THENL=S2:F1=254 
TIME=1:sFORX=1TO23 
ITF VB=400THENFPRINT "OO0O0O0OOOOOOOOOO0O0ONO0OOO00" sEG0TOLSO 


roo” Moet Monk Meeh Meek Mont Mee® Seo! Menk Saal See! Ven% Sent Moa® Mao! Mee! Meet Meet Meek Seok Maoh Yonh Yaak Yank Yenf Yoel Mee® Yael Vaat Maa® Man® Manh Voeh Meek Meek Meet Yeoh Meal Meet Yeoh Yeah Meet Yeah Yeah YewT Yee ® Yew YowT Yan YeeT Sew 


NEXTsFPO=48:POKES30, 1 

REM FOR DISK FOKESAO, 1=FOKE2ZO76, 96 
K=O:W=—-L:rsE=INT (S3507+35008RND (9))2TF FREER (CE) <POTHENI4©O 
FOKEE, 88 

B=E 

FORX=1TOSO: NEXTX 

Q=RND (1) *Z 

TIME=TIME+1: IFTIME>40OTHENFOKEE, 32: E=M 
IFTIME?1460THEN4S90 

IFTIME?80ANDI +1 THEN4SSO 

POKER, 32:POKEM, 32:FOKEE, 88 

IFJ=STHENGOTOS20 

IFQ< 1 THENE=E+1:2 GOTO240 

IFQ< 2THENE=E-1: GOTO340 

IFQ<. 2THENE=E+L : GOTO240 

IFQ<{4THENE=E-L: GOTO340 

IFQ< STHENE=E+L+1:GOTO240 

IFQ« 6THENE=E-L+1:GOTO346 

IFQ< 7THENE=E+L+1:GOTO240 

IFO 8THENE=E-L-1:GOTO340 

E=E+W 
FORES7088,F15 Y=PEEK (S7088) : TFVR=SO0THENY=2535-Y 
IFFEER (57100) =S30RFEER (57100) =222THENZO 

TF Y=STHENW=-— 1 

IF Y=3STHENW=+1 

IFY=635S THENW=—L 

TFY=OTHENW=L. 

IF Y=7 THENW=L. 

P=PEER (CE): TIFFS >FOQTHENE=B: IFTIMES40OTHENFOKEE, 32:F=M:GOTO180 
IFPs >POTHENLT SO 

POKER, 32:sFOQREE, 32:M=B 

B=E: TIME=1:FORX=1TOSR: G=RND (8) s NEXT 

=k + 1 

FOKEE, 88 

GOTOL7O 

FORX=17TOQiS:FPRINT:NEXT:FRINT'" YOUR SCORE IS"K 
BGOTOLOO 

FPRINT"'ARTIST':PRINTSPRINT'SIT BACK AND RELAX" 
PRINT"AND I WILL DRAW FICTURES FOR YOU" :sFORX=1 T0200: NEXT 
FRINTEFPRINT'I THINE YOU WILL LIKE THEM" sFORX=17T0200: NEXT 
FRINT'TYFE (ESC) FOR A NEW GAME 


ay 


should work with probabilties just as 


Porites eae real life does. So I set up a system where 
her than totally controlled 


now casual 
the game always stopped tos 


remember his 


bug as the 


gift certificate to the 


AO 
pes 36 
me 
m7 
BO 
ra og: 
S00) 
610 
620 
620) 
640 
650 
640 
& 70) 
&BO 
& PO 
POO 
Tae 
720 
fou 
74AO 


fo 


FORX=1TOS000:; NEXT: GOTO80O 

FRINT'MONGOL HORDES": FRINT:FRINT'YQU NOW COMMAND A HORRIBLE 
PRINT "OF MONGOL AS" 

FORX=17TO1S00: NEXT 

FRINT' THERE ARE TWO FROBLEMNS"sFORX=1TO1S00: NEXT:FPRINT 
PRINT"THEY ARE VERY HUNGRY" 

PRINTVIF THEY RUN DUT OF O'S 70 RAVAGE THEY DIE” 
FRINT'AND THEY DON? T FOLLOW ORDERS 

FRINT'MUCH MORE THAN HALF THE TIME" :GOTOQ670 

PRINT" THE GOOER GOBRLER'sFPRINT 

PRINT YOUR FAITTHFULL SERVANT GOBBLES GORS OF GOORS" 
PRINT" (GOORS ARE TINY CIRCULAR ANIMALS) 
PRINTErPRINT “YOUR FPRGSLEMN 1S 7 KEEP HIN FED” 

FRINT' YOUR CONTROLS ARE" 

PRINT“ (CTRL TO MOVE UP 

FRINT" {i SHIP i? FOVeE Ler MOVE RIGHT (R.SHIFT) 
PRINT" ROTH SHIFTS AT ONCE TO MOVE DOWN" 
PRINTSPRINT"MOVE FAST, YOUR FETS WILL Dik 

PRINT IF LEFT ALONE TOO LONG" 

PRINT" YOUR SCORE IS THE AMOUNT EATEN 

PRINT (ESC) GETS A NEW GAME 

INFUT"INFUT ANY NUMBER TTQ START": Ts GOTO8G 


I’M NOT CERTAIN THAT I BELIEVE IN BIORHYTHMS, BUT THIS ONE IS 
ONE IS AT LEAST ACCURATE. ITF DOESN’ T HAVE GRAPHICS 

AS IT WAS ORIGINALY WRITTEN FOR THE OLD SUPERBOARD WHICH 

HAD THE SAME 24 CHARACTER WIDE DISPLAY AS THE CiP AND 

AND I COULDN’ T SEE DOING ANY MEANINGFUL GRAPHING ON THAT 
DISPLAY Size « 

BY THE WAY, MOST OF THIS PROGRAM WAS WRITTEN BY JANE OLSEN 


CAARDVARK V.P.) AS HER SECOND ATTEMPT AT PROGRAMMING. 


S PRINT: PRINT: PRINT: PRINT 


1@ DIMAS$C 12) 
15 PRINTTABC 113" BIORHYTHM" 
13 PRINT:PRINT: PRINT: PRINT :PRINT:PRINT: PRINT 


26 INPUT"DO YOU WISH INSTRUCTION"; Q%: IFQS="NO" THENGOTOL24 
21 FORX=1T0O15: PRINT: NEXT 


25 PRINT" BIORHYTHM IS BASED ON THE THEORY" 


265 PRINT“THAT WE ARE CONTROLLED IN PART* 
27’ PRINT"“BY BIOLOGICAL RHYTHMS THAT BEGIN" 


28 PRINT“AT OUR BIRTH":PRINT: PRINT: PRINT:PRINT 


38 PRINT"“THESE RHYTHMS ARE: " 
32 PRINT"“PHYSICAL (23 DAY CYCLE?" 
34 PRINT ‘EMOTIONAL (26 DAY CYCLE >* 


36 PRINT" INTELLECTUAL (33 DAY CYCLE 3* 


37 INPUT"READY FOR MORE"; X% 


46 PRINT" THE FIRST HALF OF EACH CYCLE" 


42 PRINT"“IS CONSIDERED TO BE UP OR” 

44 PRINT “ENERGIZED* : PRINT: PRINT 

46 PRINT"°THE LAST HALF OF EACH CYCLE” 

48 PRINT"“IS DOWN OR A PERIOD OF * 

96 PRINT "REGENERATION" : PRINT: PRINT: PRINT 


931 PRINT: PRINT: INPUT"“READY FOR MORE":X$% 


S92 PRINT"THE FIRST,LAST AND MIDDLE DAY" 

S4 PRINT"“OF EACH CYCLE IS CONSIDERED" 

S56 PRINT"TO BE CRITICAL - THE PERIOD" 

S58 PRINT“IN WHICH THE POWER CONTROLLED" 

66 PRINT“BY THAT RHYTHM IS AT ITS LOWEST" 
62 INPUT"“READY FOR MORE"; X% 

64 PRINT°I WILL TAKE YOUR BIRTHDATE” 

66 PRINT"AND COMPUTE THE TOTAL NUMBER OF * 
68 PRINT“DAYS YOU HAVE LIVED ( INCLUDING" 

7@ PRINT"“LEAP YEARS) AND THE PRESENT" 

f2 PRINT"POSITION OF EACH CYCLE” 

74 PRINT: PRINT: PRINT: PRINT 

6 PRINT“ INPUT THE DATE IN THIS MANNER: ” 

78 PRINT"1@,12, 1943" 

86 FORKX=1T04: PRINT: NEXT: FORX=1TO020@88: NEXT 
126 DIMFC12):DIMIC2): DIMM 188) 

1598 READFC1),F02),FC3),FC4),F(5),F(6),F07),F083,F09),FC19),FC11),FC12) 
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HORDE 


ooo ee ee 
—==- A — =) eee 0 ee 


169 DATARS, 29,31. 30,231,300, 31,31, 36,31, 350,31, . 

266 PRINT“WHAT IS YOUR NAME": INPUTZS 

228 PRINT"“GIVE ME YOUR BIRTHDATE*: INPUTM1,D1,Y1 

273 PRINT°STARTING DATE OF CHART?” = INPUTM2, D2, ¥2 

298 PRINT"“HOW MANY DAYS DO YOU":PRINT*WANT CHARTED?* : INPUTL 
3128 X=M1i+: GOSUBS82G: Ji=TJ2+¢ CY2-Y19*365 >: X=M2: GOSUBSES: Ji=J1-J2 
346 Y=Y1:R=@:FORW=Y1iTOY2: IF INTC Y74)=Y/4THENR=Rt1 

366 Y=Y¥+1:NEXTW: Ji=J1i+R 

378 ASC 13="JAN* > ASC 2 3="FEB" > ASC 33="MAR" : ASC 4 3="APRIL" 
3860 ASCSI="MAY" > ASCE I="JUNE” FASC T I=" IJULY” : ASC BI="AUG" 
390 ASCDI="SEPT" : ASC 143="OCT" ASC 113="NOU" :AS$C12)="DEC* 
486 PRINT" BIORHYTHM CHART FOR ";2% 

560 FORN=1TOL 

567 IFINTCON/1@)=N/7 1 BTHENF ORT C=1TO584@0:NEXTTC 

588 PRINT 

51@ PRINTASC(M2):D2;Y2 

pao P=INICUCJIZ233-INIC Jiv2an 3 3*233 

546 PRINT"“P="P;:IFP>@ANDP<L2THENPRINT"“UP “; 

554 IFP=H0RP=120RP=23THENPRINT “CRIT"; 

555 IFP>1LZANDP< 23THENPRINT “ DOWN" ; 

S66 E=INTCCCJ1/283)-INTC J1/28 3 3*28) 

565 PRINT” E="E35:IFE<14ANDE SB THENPRINT”™ UP “; 

576 IFE=GORE=140RE=28THENPRINT “CRIT”; 

575 IFE>LSANDE< ZBTHENPRINT “ DOWN" ; 

pee I=iINTt CC Sires s- init ii/as ) 4332 

pee PRINT” E="15 

285 IFI>WANDI< LYTHENPRINT “UP” 

530 IF I=BORT=170RI=S3THENPRINT “CRIT” 

535 IFI>LPANDI< S3STHENPRINT " DOWN” 

600 D2=D2t1:Ji=Jit+1: IFD2>F¢(M2 JTHEND2=1 : N2=M2+1 

630 IFM2< LSTHENG4@ 

635 M2=1:Y2=Y2t1 

6460 IFINTCY2/4)=Y2/4THEN6S5S 

645 FC2)=28: GOTOGEG 

655 F(2)=29 

664 NEXTN 

67@ INPUT"DO YOU WISH TO CONTINUE’; BS 

6846 IFBS="YES" THEN2ZSG 

685 PRINT“TIME FOR A NEW CUSTOMER": PRINT: PRINT: PRINT: GOTO2H6 
820 J2=G: FORI=XTO12: J2=IJ2+FCLI:NEXTI 

864 J2=J2-(01+1):RETURN 

9386 REM 

324 J2=6 

9330 FORI=XTO12 

344 J2=J2+FC(1I) 

S354 NEXTI 

966 J2=J2-CD2Z+1) 


at ara RENEWAL TIME!!! 


This issue is the last of year #1, volume #1, so if you haven’ t 
already resubscribed, its time to do so! The JOURNAL subscriptions 
only go by even years (full volumes) from April to Februrary. We even 
provided you with a form (below? carefully placed SO yGu can cut it 


out without losing one letter of the JOURNAL itself (see how 
thoughtful we are). 


JovoRNAL DUBSCRIPTIOUW FORH 


NAHE 

A DORESs 

City 

STATE ZIP 

C JCHECH C VISA CARD+ 


( ) HONEY ORDER ( ) HASTERCHARGE exp 


E] RENEWAL (Voc#2) LO NEW -CHECK AMPbOPRIATE Box Below 
APen $1- FEB-BE 700 FT are). J wANTALL THE BACK ISSUS. | 


L]-Cawt KEEP IT To KYL APRIL 80- FEBS! -*9.00 
~SEUD Hy FzIGon A [1 \ocx2- STAT LY SQESLBIPTION 
SUBSCRIPTION SO HEM WITH APeit FI — $9.0 


QUIT WRIDKLING HINE [I Lure To READ-SEXLD een VoL# | | 


OVERSEAS SUBSCRIPTIONS ~ # /4..00 ous. 


poe 


10 THE XE LOK MACHILE  #¥0c#2 -— 9/8.00 l 


FEEDBACK TIME - OPINION WANTED 


You may have noticed the new type style in 
this issue. We went to it in the hopes of 
increasing ledgibility and partially because 
it is a denser medium. We get more 
characters per page with this method. 

The journal was done previously on a Paper 
Tiger and shot down 28% for publ ication. 
This issue was done on the Comprint and 
reduced about 38%. The listing for the 
Gobbter was done on the new Epson. 

Now, here is the opinion we want. Should we: 
A> Keep the old style of print. B> Keep the 
new style. or C> Try again cause it still 
isn’ t readable. 


*¥*NOTICE#* We now have C1S monitor ROMS 
that will allow graphics to be printed to 
screen. If you want to trade your 
non-graphics version in on a new one, either 
send the ROM back or send a $25.08 deposit 
which will be returned when wea receive thea 
old ROM back. 

' A few of the early C1E and C2E ROMs had 
aq typo that made the break point utility 
nonfunctional. We will replace these on tha 
same basis as above. 

As the string bug fix in the C1E and 
C2E has been less effective than we hoped - a 
lot less effective - anyone who has purchased 


a Cl or C2E can get a new ROM BASIC #3 at 
less than our cost ($8.80). 


AARDVARK 


TECHNICAL SERVICES 


1690 Bolton, Walled Lake, MI 48088 
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14 CHARACTER FILE NAMES 
A closing goody for 65D users. Yois too 
can have 14 character names in your 
directory. Make these changes 


AT oa ww YLT ee we et change to 
a Le ee WT ok ee SBF 
4 2 ee Gia ee wees $05 
SAD Fla «oes a a ee oe $FO 
OA As xa % Bees ware Ss $18 — 
REMEMBER - you will have to put together a 


directory program to read 14 character file 
names and have a Bexec* program ready to put 
on the disk. When you have it done, you have, 


room for big names - or - if you want to = a. 
little extra work, for big names and files 
coded for assembler, BASIC and data. sas 
fun. 


P.S. This was written by Chuck Scott as part 
of the Super executive program he has put 
together for AARDVARK. 


\ vy 
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